Random procedure

  DECLARATION:  Random(Range : Word);

      PURPOSE:  Generates a random number within a range

         UNIT:  System

      REMARKS:  Generates a random number greater than or equal to zero
                and less than Range.  If no number is specified then
                Range is assumed to be one.

                The random number generator should be initialized with a call
                to Randomize, or by assigning a value to RandSeed.

                NOTE:  The random number generator's seed is stored in a
                       predeclared longint variable called RandSeed.

                       By assigning a specific value to RandSeed, a specific
                       sequence of random numbers can be generated over and
                       over again.  This can be used in applications such as
                       data encryption.